object MainForm: TMainForm
  Left = 434
  Top = 239
  Width = 818
  Height = 545
  Caption = 'PascalScriptEditor'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 16
  object Panel3: TPanel
    Left = 0
    Top = 0
    Width = 802
    Height = 487
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 0
    object Splitter1: TSplitter
      Left = 0
      Top = 268
      Width = 802
      Height = 3
      Cursor = crVSplit
      Align = alBottom
    end
    object Panel2: TPanel
      Left = 0
      Top = 271
      Width = 802
      Height = 216
      Align = alBottom
      BevelOuter = bvNone
      TabOrder = 0
      object PageControl2: TPageControl
        Left = 0
        Top = 0
        Width = 802
        Height = 216
        ActivePage = TabSheet1
        Align = alClient
        TabOrder = 0
        TabStop = False
        object TabSheet1: TTabSheet
          Caption = 'Complie Messages'
          object lbComlieMsgs: TListBox
            Left = 0
            Top = 0
            Width = 794
            Height = 185
            Align = alClient
            ImeName = #35895#27468#25340#38899#36755#20837#27861' 2'
            ItemHeight = 16
            TabOrder = 0
            OnClick = lbComlieMsgsClick
          end
        end
        object TabSheet2: TTabSheet
          Caption = 'Find Results'
          ImageIndex = 1
          object ListBox1: TListBox
            Left = 0
            Top = 0
            Width = 802
            Height = 185
            Align = alClient
            ImeName = #35895#27468#25340#38899#36755#20837#27861' 2'
            ItemHeight = 16
            TabOrder = 0
          end
        end
      end
    end
    object Panel4: TPanel
      Left = 0
      Top = 0
      Width = 802
      Height = 268
      Align = alClient
      BevelOuter = bvNone
      TabOrder = 1
      object statusBar: TStatusBar
        Left = 0
        Top = 249
        Width = 802
        Height = 19
        Panels = <
          item
            Width = 100
          end
          item
            Width = 400
          end
          item
            Width = 50
          end>
      end
      object PageEditors: TPageControl
        Left = 0
        Top = 0
        Width = 802
        Height = 249
        Align = alClient
        TabOrder = 1
        TabStop = False
        OnChange = PageEditorsChange
      end
    end
  end
  object MainMenu1: TMainMenu
    AutoHotkeys = maManual
    Left = 160
    Top = 96
    object N1: TMenuItem
      Caption = 'File'
      object N2: TMenuItem
        Action = ActionNew
      end
      object open1: TMenuItem
        Action = ActionOpen
      end
      object close1: TMenuItem
        Action = ActionClose
      end
      object Save1: TMenuItem
        Action = ActionSave
      end
      object SaveAll1: TMenuItem
        Action = ActionSaveAll
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object Complie1: TMenuItem
        Action = ActionComplie
      end
    end
  end
  object XPManifest1: TXPManifest
    Left = 856
    Top = 97
  end
  object SynPasSyn1: TSynPasSyn
    Left = 192
    Top = 97
  end
  object SynCompletionCode: TSynCompletionProposal
    Options = [scoLimitToMatchedText, scoUseInsertList, scoUsePrettyText, scoUseBuiltInTimer, scoEndCharCompletion, scoCompleteWithTab, scoCompleteWithEnter]
    EndOfTokenChr = '()[]. :,='
    TriggerChars = '.'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clBtnText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = [fsBold]
    Columns = <>
    OnExecute = SynCompletionCodeExecute
    ShortCut = 16416
    Left = 224
    Top = 97
    EndOfTokenChrW = '()[]. :,='
    TriggerCharsW = '.'
  end
  object SynCompletionParam: TSynCompletionProposal
    DefaultType = ctParams
    Options = [scoLimitToMatchedText, scoUseInsertList, scoUsePrettyText, scoUseBuiltInTimer, scoEndCharCompletion]
    ClBackground = clInfoBk
    EndOfTokenChr = '()[]. '
    TriggerChars = '('
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clBtnText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = [fsBold]
    Columns = <>
    OnExecute = SynCompletionParamExecute
    ShortCut = 8304
    Left = 256
    Top = 97
    EndOfTokenChrW = '()[]. '
    TriggerCharsW = '('
  end
  object OpenDialog: TOpenDialog
    Filter = 'Pascal Source File|*.pas'
    Left = 296
    Top = 89
  end
  object SaveDialog: TSaveDialog
    DefaultExt = '.pas'
    Filter = 'Pascal Source File|*.pas'
    Left = 336
    Top = 89
  end
  object ActionManager1: TActionManager
    Left = 368
    Top = 89
    StyleName = 'XP Style'
    object ActionComplie: TAction
      Caption = 'Complie'
      ShortCut = 16504
      OnExecute = ActionComplieExecute
    end
    object ActionNew: TAction
      Caption = 'New'
      ShortCut = 16468
      OnExecute = ActionNewExecute
    end
    object ActionSave: TAction
      Caption = 'Save'
      ShortCut = 16467
      OnExecute = ActionSaveExecute
    end
    object ActionSaveAll: TAction
      Caption = 'Save All'
      ShortCut = 24659
      OnExecute = ActionSaveAllExecute
    end
    object ActionClose: TAction
      Caption = 'Close'
      ShortCut = 16471
      OnExecute = ActionCloseExecute
    end
    object ActionOpen: TAction
      Caption = 'Open'
      ShortCut = 16463
      OnExecute = ActionOpenExecute
    end
  end
end
